/************************************************************************/
/*  									*/
/*  cenrplc_SIS.c							*/
/*									*/
/*  Tom Lookabaugh							*/
/*  August 13, 1987							*/
/*  Last Revision: August 15, 1987					*/
/*									*/
/*  DESCRIPTION								*/
/*	Update centroid information.					*/
/*	Scalar Itakura-Saito Version: Divide accumulated data by count;	*/
/*	also store logarithm.						*/
/*  RETURNS								*/
/*	No significant return value.  Modifies storage pointed to by	*/
/*	updtinfo and centroid.						*/
/*  CALLS								*/
/*	none.								*/
/*									*/
/************************************************************************/

#include "stdvq.h"
#include <math.h>

cenrplc (updtinfo, centroid, count) 

    double* updtinfo;	/* pointer to cenupdt member			*/
    double* centroid;	/* vector to be used in updating		*/
    long count;		/* cell population				*/

{


    updtinfo[0] /= ((double) count);
    centroid[0] = updtinfo[0];
    centroid[1] = log(centroid[0]);
}
